home *** CD-ROM | disk | FTP | other *** search
/ IBM InfoROM for OS/2 Beta 1995 January / IBM InfoROM for OS2 Beta 1-1995.ISO / testcert / storage / function / cdrom / paudts2.scr < prev    next >
Encoding:
Text File  |  1994-09-07  |  771 b   |  33 lines
  1. @thread PAUDTS2.LOG
  2. @NewAlias cd CDROM.GRA
  3. @IMPORT SYSINFO.TXT
  4. cd LOG $PROMPT="LOGGING PAUDTS2"
  5. cd LOG $PROMPT="THREAD 1"
  6. cd set ADDRESSMODE=REDBOOK
  7. cd set TIMESTART=24:20:00 TIMESTOP=28:00:00
  8. cd CDROM_OPEN
  9. cd CDROM_PLAYAUDIO
  10. cd response $PROMPT="PLAYING AUDIO FOR 2 MINUTES" $PAUSE=120
  11. cd CDROM_STOPAUDIO
  12. cd CDROM_CLOSE
  13. @flush cd
  14. *
  15. *
  16. *
  17. @thread PAUDTS2.LOG
  18. @NewAlias cd1 CDROM.GRA
  19. @IMPORT SYSINFO2.TXT
  20. cd1 LOG $PROMPT="LOGGING PAUDTS2"
  21. cd1 LOG $PROMPT="THREAD 2"
  22. cd1 set ADDRESSMODE=REDBOOK
  23. cd1 set TIMESTART=06:45:00 TIMESTOP=09:00:00
  24. cd1 CDROM_OPEN
  25. cd1 response $PROMPT="WAITING FOR 2 MINUTES" $PAUSE=130
  26. cd1 CDROM_PLAYAUDIO
  27. cd1 response $PROMPT="PLAYING AUDIO FOR 2 MINUTES" $PAUSE=120
  28. cd1 CDROM_STOPAUDIO
  29. cd1 CDROM_CLOSE
  30. @flush cd1
  31.  
  32.  
  33.